home *** CD-ROM | disk | FTP | other *** search
/ Virtual Vibrations / Virtual Vibrations.iso / mac / Virtual Vibrations / STAR.DXR / 00044.ls < prev    next >
Encoding:
Text File  |  1994-10-28  |  1.8 KB  |  87 lines
  1. on enterFrame
  2.   puppetPalette(0)
  3. end
  4.  
  5. on mouseDown
  6.   if (the clickOn >= 17) and (the clickOn <= 20) then
  7.     BUTTONDOWN()
  8.   else
  9.     if the clickOn = 48 then
  10.       puppetSound("click")
  11.     end if
  12.   end if
  13. end
  14.  
  15. on mouseUp
  16.   global voice, sourceScreen
  17.   if (the clickOn >= 17) and (the clickOn <= 20) then
  18.     puppetSprite(48, 0)
  19.     set voice to 0
  20.     if the clickOn = 17 then
  21.       set the movieRate of sprite 27 to 0
  22.       puppetSprite(12, 0)
  23.       puppetSprite(13, 0)
  24.       puppetSprite(23, 0)
  25.       puppetSprite(24, 0)
  26.       puppetSprite(25, 0)
  27.       puppetSprite(27, 0)
  28.       puppetSprite(48, 0)
  29.       go("showMovie2")
  30.     end if
  31.     if the clickOn = 18 then
  32.       set the movieRate of sprite 27 to 0
  33.       puppetSprite(12, 0)
  34.       puppetSprite(13, 0)
  35.       puppetSprite(23, 0)
  36.       puppetSprite(24, 0)
  37.       puppetSprite(25, 0)
  38.       puppetSprite(27, 0)
  39.       puppetSprite(48, 0)
  40.       set voice to 0
  41.       go("hideMovie")
  42.     end if
  43.     if the clickOn = 19 then
  44.       ADDORDERBUTTON()
  45.     end if
  46.     if the clickOn = 20 then
  47.       set the movieRate of sprite 27 to 0
  48.       puppetSprite(12, 0)
  49.       puppetSprite(13, 0)
  50.       puppetSprite(23, 0)
  51.       puppetSprite(24, 0)
  52.       puppetSprite(25, 0)
  53.       puppetSprite(27, 0)
  54.       puppetSprite(48, 0)
  55.       set voice to 0
  56.       if soundBusy(2) then
  57.         sound stop 2
  58.       end if
  59.       if sourceScreen = 1 then
  60.         go("interac")
  61.       else
  62.         go("movies")
  63.       end if
  64.     end if
  65.   end if
  66.   if the clickOn = 48 then
  67.     CHANGESOUND6()
  68.   end if
  69.   if the clickOn = 23 then
  70.     go(the frame)
  71.   end if
  72.   if the clickOn = 24 then
  73.     go(the frame + 1)
  74.   end if
  75.   if the clickOn = 25 then
  76.     go(the frame + 3)
  77.   end if
  78. end
  79.  
  80. on exitFrame
  81.   global clipLength, fixpal
  82.   if the movieTime of sprite 27 = clipLength then
  83.     go(the frame + 1)
  84.   end if
  85.   go(the frame)
  86. end
  87.